home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
MATHEMAT
/
0502.ZIP
/
EXAMPPOS.DAT
< prev
next >
Wrap
Text File
|
1980-01-01
|
5KB
|
669 lines
1
1
2
2
3
3
4
4
5
5
6
6
7
7
8
9
9
10
10
11
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END1
1
2
2
3
3
4
4
5
5
6
6
7
7
8
9
9
10
10
11
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END1
1
2
2
3
3
4
4
5
5
6
6
7
7
8
9
9
10
10
11
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
END
29 PRINT" : Copies of this program are not to be sold for profit :
30 PRINT" : but may be copied freely. Suggestions welcomed. :
31 PRINT" :=================================================================:
32 PRINT" ":PRINT TAB(20);:INPUT"PRESS <ENTER> TO START PROGRAM EXECUTION";A$
33 CLS
55 DIM X1$(255),Y1$(255),X$(255),Y$(255),X(255),Y(255),R(65),RR(25)
56 DIM RC(25),A(25),B(25),C(25)
57 XQ=0
110 FOR I=1 TO 255: X$(I)="END":Y$(I)="END":NEXT I:CLS:IF XQ=1 THEN 1000
120 CLS:PRINT TAB(15);"=================================================="
130 PRINT TAB(15);"| CURVE-FITTING BY Thomas S. Cox Version 2.05|"
131 PRINT TAB(15);"| (C) 1985 December 25, 1985 Revision |"
132 PRINT TAB(15);"| BASICA (C) Microsoft required for this Pgm. |"
134 PRINT TAB(15);"| Your Choices are: |"
135 PRINT TAB(15);"| |"
140 PRINT TAB(15);"| 1. ENTER NEW DATA
29 PRINT" : Copies of this program are not to be sold for profit :
30 PRINT" : but may be copied freely. Suggestions welcomed. :
31 PRINT" :=================================================================:
32 PRINT" ":PRINT TAB(20);:INPUT"PRESS <ENTER> TO START PROGRAM EXECUTION";A$
33 CLS
55 DIM X1$(255),Y1$(255),X$(255),Y$(255),X(255),Y(255),R(65),RR(25)
56 DIM RC(25),A(25),B(25),C(25)
57 XQ=0
110 FOR I=1 TO 255: X$(I)="END":Y$(I)="END":NEXT I:CLS:IF XQ=1 THEN 1000
120 CLS:PRINT TAB(15);"=================================================="
130 PRINT TAB(15);"| CURVE-FITTING BY Thomas S. Cox Version 2.05|"
131 PRINT TAB(15);"| (C) 1985 December 25, 1985 Revision |"
132 PRINT TAB(15);"| BASICA (C) Microsoft required for this Pgm. |"
134 PRINT TAB(15);"| Your Choices are: |"
135 PRINT TAB(15);"| |"
140 PRINT TAB(15);"| 1. ENTER NEW DATA
